﻿Public Class LoaiNhaBUS
    Public Sub Insert(ByVal loainha As LoaiNhaDTO)
        Dim loainhaDAO As New LoaiNhaDAO
        loainhaDAO.Insert(loainha)
    End Sub
    Public Sub Delete(ByVal loainha As LoaiNhaDTO)
        Dim loainhaDAO As New LoaiNhaDAO
        loainhaDAO.Delete(loainha)
    End Sub
    Public Sub Update(ByVal loainha As LoaiNhaDTO)
        Dim loainhaDAO As New LoaiNhaDAO
        loainhaDAO.Update(loainha)
    End Sub
    Public Function GetAll() As DataTable
        Dim loainhaDAO As New LoaiNhaDAO
        Return loainhaDAO.GetAll()
    End Function
    Public Function GetItemID(ByVal ten As String) As LoaiNhaDTO
        Dim loainhaDAO As New LoaiNhaDAO
        Dim dt As New LoaiNhaDTO
        dt = loainhaDAO.GetItemID(ten)
        Return dt
    End Function
    Public Function SelectID(ByVal ma As String) As LoaiNhaDTO
        Dim loainhaDAO As New LoaiNhaDAO
        Return loainhaDAO.SelectID(ma)
    End Function
End Class
